home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 7 / PC World Interactive 7.iso / program / cprog.EXE / EKRANSIL.C < prev    next >
Text File  |  1996-07-05  |  590b  |  25 lines
  1. #include <dos.h>
  2. ekransil()          /* bu rutin, ekrani siler */
  3. {
  4.     union REGS gir;
  5.  
  6.     gir.h.ah = 6;       /* servis no su 6 */
  7.     gir.h.al = 0;       /* kac satir scroll edecegi 'donecegi' */
  8.     gir.h.ch = 0;       /* sol ust kosenin satir no su */
  9.     gir.h.cl = 0;       /* sol ust kosenin kolon no su */
  10.     gir.h.dh = 23;      /* sag alt kosenin satir no su */
  11.     gir.h.dl = 79;      /* sag alt kosenin kolon no su */
  12.     gir.h.bh = 7;       /* yeni yaratilacak satirlar icin renk degeri */
  13.  
  14.     int86(16,&gir,&gir);
  15. }
  16. main()
  17. {
  18.     puts("acaba");
  19.     ekransil();
  20.     puts("Temiz");
  21. }
  22.  
  23.  
  24.  
  25.